home *** CD-ROM | disk | FTP | other *** search
/ LOGIC Apps / Logic-APPLE_II_APPS.iso / mac / LOGIC Apple II 5.25" Library - DOS Part 1 / DOS002.dsk / DISPLAY INTEGER AVAIL. MEM.int < prev    next >
Text File  |  2012-02-16  |  2KB  |  67 lines
  1. 10 REM 
  2. 11 REM -------------------------
  3. 12 REM !   AVAILABLE MEMORY    !
  4. 13 REM -------------------------
  5. 14 REM !   FROM PAGE 4 OF THE  !
  6. 15 REM !   10/78 ISSUE OF THE  !
  7. 16 REM !   SOUTHEASTERN        !
  8. 17 REM !   NEWSLETTER          !
  9. 18 REM -------------------------
  10. 19 REM !   PROGRAM IDEA        !
  11. 20 REM !   SUGGESTED BY        !
  12. 21 REM !   G. MCCLELLAND       !
  13. 22 REM -------------------------
  14. 23 REM !   MODIFIED BY         !
  15. 24 REM !   T N TAYLOR          !
  16. 25 REM !   VERSION 2           !
  17. 26 REM !   31 DEC 78           !
  18. 27 REM -------------------------
  19. 28 REM 
  20. 50 CALL -936
  21. 52 PRINT :PRINT :PRINT :PRINT 
  22. 55 LIST 11,18
  23. 60 FOR I=1 TO 2000:NEXT I
  24. 65 CALL -936
  25. 66 PRINT :PRINT :PRINT :PRINT 
  26. 70 LIST 18,27
  27. 75 FOR I=1 TO 2000:NEXT I
  28. 80 CALL -936
  29. 100 PRINT :PRINT 
  30. 103 PRINT "THIS PROGRAM DOES NOT WORK WITH A MEMORYSIZE LARGER THAN 32K DUE TO >32767 ERROR"
  31. 104 PRINT 
  32. 105 INPUT "WHAT IS THE K SIZE OF YOUR APPLE MEMORY",K
  33. 108 PRINT :PRINT 
  34. 110 REM  *** CM = END OF VARIABLE TABLE
  35. 111 REM  *** HM = HIGH MEMORY
  36. 112 REM  *** LM = LOW MEMORY
  37. 113 REM  *** PP = BEGINNING OF PROGRAM
  38. 114 REM  *** VT = SIZE OF VARIABLE TABLE
  39. 115 REM  *** BP = SIZE OF BASIC PROGRAM
  40. 119 BP=0:CM=0:HM=0:LM=0:PP=0:VT=0:F=0:T=0
  41. 120 PP= PEEK (202)+ PEEK (203)*256
  42. 125 CM= PEEK (204)+ PEEK (205)*256
  43. 126 LM= PEEK (74)+ PEEK (75)*256
  44. 127 HM= PEEK (76)+ PEEK (77)*256
  45. 130 BP=HM-PP
  46. 135 VT=CM-LM
  47. 140 F=PP-CM
  48. 145 IF K>32 THEN 146:T=(K-2)*1024
  49. 146 TM=K
  50. 147 SUM=LM+VT+F+BP
  51. 148 DIFF=HM-SUM
  52. 150 PRINT "LOW MEMORY               ";LM
  53. 151 PRINT "SIZE OF VARIABLE TABLE   ";VT
  54. 152 PRINT "FREE BYTES               ";F
  55. 155 PRINT "SIZE OF BASIC PROGRAM    ";BP
  56. 160 PRINT "                         -------"
  57. 165 PRINT "HIGH MEMORY BY ADDING    ";SUM
  58. 167 PRINT "ACTUAL HIGH MEMORY       ";HM
  59. 169 PRINT "                         -------"
  60. 171 PRINT "DIFFERENCE               ";DIFF
  61. 173 PRINT 
  62. 174 PRINT "BYTES USED               ";T-F
  63. 176 PRINT 
  64. 177 PRINT "TOTAL MEMORY             ";TM
  65. 200 END 
  66. 9999 REM  THIS PROGRAM CAME TO  THE A.C.E.S. FROM NEWTON'S  TREE
  67.